home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 71 / maccd 71.iso / macware / Cyclone 1.2 ƒ / Scripting / Convert clipboard next >
Encoding:
Text File  |  1999-11-06  |  527 b   |  23 lines  |  [TEXT/ToyS]

  1. on run
  2.     ConvertClipWithCyclone()
  3. end run
  4.  
  5. on ConvertClipWithCyclone()
  6.     tell application "Cyclone"
  7.         activate
  8.         
  9.         try
  10.             convert clipboard from Mac_Roman_Euro_Sign to Unicode_2_1_UTF_8
  11.         on error number the error_number
  12.             error "An error occured during clipboard conversion." & return & "Error code: " & (error_number as text)
  13.         end try
  14.         
  15.         if result is not 0 then
  16.             error "An error occured during clipboard conversion." & return & "Error code: " & (result as text)
  17.         end if
  18.         
  19.         quit
  20.     end tell
  21.     
  22. end ConvertClipWithCyclone
  23.